﻿Public Class clsHWSetting
    Public Function selectAllLHJ() As DataTable
        Dim szSql As String = String.Empty
        szSql &= "SELECT * FROM sf.t_hw_setting WHERE factory_id =? AND workshop_id = ? "
        szSql &= "  AND equip_type_id = ? AND deleted = false ORDER BY equip_id  ASC"
        Dim dt As DataTable = DBacs.ExecuteSql(szSql, -1, "TS", "LH", "LHJ")
        If IsNothing(dt) Then
            selectAllLHJ = New DataTable
        Else
            selectAllLHJ = dt
        End If
    End Function
End Class
